﻿Public Class Partition

    Public RangeValue As New Object
    Public Size As Integer = 0
    Public Rows As Integer = 0

    Public Sub New(PartitionSize As Integer)
        Size = PartitionSize
    End Sub

    Public Sub New(PartitionRangeValue As Object, PartitionSize As Integer, PartitionRows As Integer)
        RangeValue = PartitionRangeValue
        Size = PartitionSize
        Rows = PartitionRows
    End Sub

End Class
